object FSelectDir: TFSelectDir
  Left = 351
  Top = 261
  BorderStyle = bsToolWindow
  Caption = 'Select A Working Directory'
  ClientHeight = 150
  ClientWidth = 251
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object DirList: TDirectoryListBox
    Left = 0
    Top = 0
    Width = 249
    Height = 129
    ItemHeight = 16
    TabOrder = 0
    OnChange = DirListChange
  end
  object BtOk: TButton
    Left = 216
    Top = 128
    Width = 35
    Height = 22
    Caption = 'Ok'
    TabOrder = 1
    OnClick = BtOkClick
  end
  object CurrentDir: TEdit
    Left = 0
    Top = 128
    Width = 217
    Height = 21
    TabOrder = 2
    OnChange = CurrentDirChange
  end
end
